(newline): Use buffer-has-markers-at.

diff --git a/lisp/simple.el b/lisp/simple.el
index 5f45ded7224ce05fa82e4857c43600d14358e894..42d5a79abf20453a09c274f99df2b48c2a805121 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -39,6 +39,8 @@ In Auto Fill mode, if no numeric arg, break the preceding line if it's long."
   ;; the end of the previous line.
   (let ((flag (and (not (bobp)) 
                   (bolp)
+                  ;; Make sure there are no markers here.
+                  (not (buffer-has-markers-at (1- (point))))
                   ;; Make sure the newline before point isn't intangible.
                   (not (get-char-property (1- (point)) 'intangible))
                   ;; Make sure the newline before point isn't read-only.